#pos=`grep -v ^# ./FIRST_EXEC/file.vcf |sort -k2,2n|cut -f2|tr '\n' ','|sed -e 's/\,$//g'`
#event=`grep -v ^# ./FIRST_EXEC/file.vcf |sort -k2,2n|cut -f5|tr '\n' ','|sed -e 's/\,$//g'`
#num_event=`grep -v ^# ./FIRST_EXEC/Maternal.vcf |sort -k2,2n|cut -f10|cut -f2 -d :|tr '\n' ','|sed -e 's/\,$//g'`
#event_length=`grep -v ^# ./FIRST_EXEC/Maternal.vcf |sort -k2,2n|cut -f8|cut -f4 -d =|tr '\n' ','|sed -e 's/\,$//g'`
#echo $pos
#echo $event
#echo $num_event
#echo $event_length
arr=`perl perl_recalc.pl /data4/bsi/RandD/Workflow/temp/Wessim/AUTOMATE/FIRST_EXEC/`
total=`echo $arr|cut -f1 -d ' '`
total_mat=`echo $arr|cut -f2 -d ' '`
total_pat=`echo $arr|cut -f3 -d ' '`
echo $total_pat
